home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC Gamer (Italian) 34
/
PC Gamer IT CD 34 2-2.iso
/
utility
/
rccd30103
/
_SETUP.1
/
Rccd.exe
/
0
/
RCDATA
/
TFRMTRACKSELECT
/
TFRMTRACKSELECT.txt
< prev
Wrap
Text File
|
1998-09-03
|
10KB
|
435 lines
object frmTrackSelect: TfrmTrackSelect
Left = 268
Top = 175
Width = 399
Height = 369
BorderIcons = [biSystemMenu, biMinimize, biMaximize, biHelp]
Caption = 'RCCD Track Selection:'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
KeyPreview = True
OnCloseQuery = FormCloseQuery
OnCreate = FormCreate
OnKeyDown = FormKeyDown
OnResize = FormResize
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Panel1: TPanel
Left = 0
Top = 0
Width = 391
Height = 81
Align = alTop
BevelOuter = bvNone
Caption = 'Panel1'
TabOrder = 0
object Label1: TLabel
Left = 28
Top = 8
Width = 35
Height = 13
Alignment = taRightJustify
AutoSize = False
Caption = '&Drive:'
FocusControl = edtDrive
end
object Label2: TLabel
Left = 28
Top = 36
Width = 35
Height = 13
Alignment = taRightJustify
AutoSize = False
Caption = '&Artist:'
FocusControl = edtArtist
end
object Label3: TLabel
Left = 28
Top = 60
Width = 35
Height = 13
Alignment = taRightJustify
AutoSize = False
Caption = '&Title:'
FocusControl = edtTitle
end
object lblCDDBSerialNumber: TLabel
Left = 124
Top = 8
Width = 105
Height = 13
AutoSize = False
Caption = 'CDDB Serial Number:'
FocusControl = edtSerialNumber
end
object edtDrive: TEdit
Left = 68
Top = 4
Width = 45
Height = 21
TabStop = False
Color = clBtnFace
ReadOnly = True
TabOrder = 0
end
object edtArtist: TEdit
Left = 68
Top = 32
Width = 281
Height = 21
TabOrder = 1
Text = 'New Artist'
end
object edtTitle: TEdit
Left = 68
Top = 56
Width = 281
Height = 21
TabOrder = 2
Text = 'New Title'
end
object edtSerialNumber: TEdit
Left = 236
Top = 4
Width = 89
Height = 21
TabStop = False
Color = clBtnFace
ReadOnly = True
TabOrder = 3
end
end
object Panel2: TPanel
Left = 0
Top = 315
Width = 391
Height = 27
Align = alBottom
BevelOuter = bvNone
TabOrder = 1
object Panel7: TPanel
Left = 220
Top = 0
Width = 171
Height = 27
Align = alRight
BevelOuter = bvNone
TabOrder = 0
object btnCancel: TButton
Left = 92
Top = 2
Width = 75
Height = 25
Caption = '&Cancel'
ModalResult = 2
TabOrder = 0
OnClick = btnCancelClick
end
object btnOK: TButton
Left = 4
Top = 2
Width = 75
Height = 25
Caption = '&OK'
ModalResult = 1
TabOrder = 1
OnClick = btnOKClick
end
end
object btnHelp: TButton
Left = 4
Top = 2
Width = 75
Height = 25
Caption = '&Help'
TabOrder = 1
OnClick = btnHelpClick
end
end
object Panel3: TPanel
Left = 149
Top = 81
Width = 77
Height = 234
Align = alLeft
BevelOuter = bvNone
TabOrder = 2
object btnAdd: TSpeedButton
Left = 14
Top = 24
Width = 61
Height = 25
Caption = 'A&dd ->'
Enabled = False
OnClick = btnAddClick
end
object btnRemove: TSpeedButton
Left = 14
Top = 52
Width = 61
Height = 25
Caption = '<- &Remove'
Enabled = False
OnClick = btnRemoveClick
end
object btnClearAll: TSpeedButton
Left = 14
Top = 80
Width = 61
Height = 25
Caption = 'C&lear All'
OnClick = btnClearAllClick
end
object btnReset: TSpeedButton
Left = 14
Top = 108
Width = 61
Height = 25
Caption = 'Re&set'
OnClick = btnResetClick
end
end
object pnlPlayList: TPanel
Left = 0
Top = 81
Width = 149
Height = 234
Align = alLeft
BevelOuter = bvNone
TabOrder = 3
object Panel6: TPanel
Left = 0
Top = 0
Width = 16
Height = 234
Align = alLeft
BevelOuter = bvNone
TabOrder = 0
end
object Panel4: TPanel
Left = 16
Top = 0
Width = 133
Height = 234
Align = alClient
BevelOuter = bvNone
TabOrder = 1
object Panel5: TPanel
Left = 0
Top = 0
Width = 133
Height = 20
Align = alTop
BevelOuter = bvNone
TabOrder = 0
object Label4: TLabel
Left = 4
Top = 3
Width = 82
Height = 13
Caption = 'A&vailable Tracks:'
end
end
object lbxAvailTracks: TListView
Left = 0
Top = 20
Width = 133
Height = 209
HelpContext = 401
Align = alClient
OnDblClick = lbxAvailTracksDblClick
Columns = <
item
Caption = 'Track Name'
Width = 120
end>
DragMode = dmAutomatic
HideSelection = False
Items.Data = {
E80000000800000000000000FFFFFFFFFFFFFFFF000000000000000007547261
636B203100000000FFFFFFFFFFFFFFFF000000000000000007547261636B2032
00000000FFFFFFFFFFFFFFFF000000000000000007547261636B203300000000
FFFFFFFFFFFFFFFF000000000000000007547261636B203400000000FFFFFFFF
FFFFFFFF000000000000000007547261636B203500000000FFFFFFFFFFFFFFFF
000000000000000007547261636B203600000000FFFFFFFFFFFFFFFF00000000
0000000007547261636B203700000000FFFFFFFFFFFFFFFF0000000000000000
07547261636B2038}
MultiSelect = True
RowSelect = True
OnEdited = lbxAvailTracksEdited
OnDragDrop = lbxAvailTracksDragDrop
OnDragOver = lbxAvailTracksDragOver
PopupMenu = PopupMenu
ShowColumnHeaders = False
TabOrder = 1
ViewStyle = vsReport
end
object Panel11: TPanel
Left = 0
Top = 229
Width = 133
Height = 5
Align = alBottom
BevelOuter = bvNone
TabOrder = 2
end
end
end
object pnlAvailTracks: TPanel
Left = 226
Top = 81
Width = 165
Height = 234
Align = alClient
BevelOuter = bvNone
TabOrder = 4
object Panel9: TPanel
Left = 0
Top = 0
Width = 16
Height = 234
Align = alLeft
BevelOuter = bvNone
TabOrder = 0
object imgHand: TImage
Left = 0
Top = 19
Width = 15
Height = 11
AutoSize = True
Picture.Data = {<image000.bmp>}
Transparent = True
Visible = False
end
end
object Panel8: TPanel
Left = 16
Top = 0
Width = 133
Height = 234
Align = alClient
BevelOuter = bvNone
TabOrder = 1
object Panel10: TPanel
Left = 0
Top = 0
Width = 133
Height = 20
Align = alTop
BevelOuter = bvNone
TabOrder = 0
object Label5: TLabel
Left = 4
Top = 3
Width = 42
Height = 13
Caption = '&Play List:'
end
end
object lbxPlayList: TListBox
Left = 0
Top = 20
Width = 133
Height = 209
HelpContext = 402
Align = alClient
DragMode = dmAutomatic
ItemHeight = 14
Items.Strings = (
'Track 1'
'Track 2'
'Track 3'
'Track 4'
'Track 5'
'Track 6'
'Track 7'
'Track 8')
MultiSelect = True
PopupMenu = popWhatsThis
Style = lbOwnerDrawFixed
TabOrder = 1
OnClick = lbxPlayListClick
OnDblClick = btnRemoveClick
OnDragDrop = lbxPlayListDragDrop
OnDragOver = lbxPlayListDragOver
end
object Panel12: TPanel
Left = 0
Top = 229
Width = 133
Height = 5
Align = alBottom
BevelOuter = bvNone
TabOrder = 2
end
end
object Panel13: TPanel
Left = 149
Top = 0
Width = 16
Height = 234
Align = alRight
BevelOuter = bvNone
TabOrder = 2
end
end
object SaveSettings: TgbSaveSettings
IniFileName = 'RCCD'
SectionName = 'Track Select Form'
RegistryKey = '\Software\GaJITS\'
Left = 356
Top = 4
end
object PopupMenu: TPopupMenu
Left = 66
Top = 169
object WhatsThis1: TMenuItem
Caption = '&What'#39's This?'
OnClick = WhatsThis1Click
end
object N1: TMenuItem
Caption = '-'
end
object PlayBrief1: TMenuItem
Caption = 'Play &Brief'
OnClick = PlayBrief1Click
end
object Play1: TMenuItem
Caption = '&Play'
OnClick = Play1Click
end
end
object gbMinMax1: TgbMinMax
MinMaxConstraints.MaxSizeX = 0
MinMaxConstraints.MaxSizeY = 0
MinMaxConstraints.MaxPositionX = 0
MinMaxConstraints.MaxPositionY = 0
MinMaxConstraints.MinTrackSizeX = 262
MinMaxConstraints.MinTrackSizeY = 279
MinMaxConstraints.MaxTrackSizeX = 0
MinMaxConstraints.MaxTrackSizeY = 0
MinMaxConstraints.ApplyMaxSizeX = False
MinMaxConstraints.ApplyMaxSizeY = False
MinMaxConstraints.ApplyMaxPositionX = False
MinMaxConstraints.ApplyMaxPositionY = False
MinMaxConstraints.ApplyMinTrackSizeX = True
MinMaxConstraints.ApplyMinTrackSizeY = True
MinMaxConstraints.ApplyMaxTrackSizeX = False
MinMaxConstraints.ApplyMaxTrackSizeY = False
Left = 186
Top = 221
end
object popWhatsThis: TPopupMenu
Left = 284
Top = 161
object WhatsThis: TMenuItem
Caption = '&What'#39's This?'
OnClick = WhatsThisClick
end
end
end